home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / Libraries / C Internet Config / Examples ƒ / Example / IC Resource ƒ / main.c < prev   
Encoding:
C/C++ Source or Header  |  1995-11-17  |  2.8 KB  |  134 lines  |  [TEXT/SPM ]

  1. #include <stdio.h>
  2. #include <stdlib.h>
  3.  
  4. #include <Folders.h>
  5.  
  6. #include "IC Types.h"
  7. #include "IC Keys.h"
  8.  
  9. #include "IC R API.h"
  10.  
  11. #ifdef DEBUG_ICRAPI
  12. #include "syslog.h"
  13. #endif
  14.  
  15. ICRRecord gRec;
  16.  
  17. void DumpPrefs(void);
  18.  
  19. int main(void){
  20.     ICError err;
  21.     ICDirSpecArray folder_spec;
  22.     Str255 email;
  23.     long attr,size,seed;
  24.     short vref;
  25.     long dirid;
  26.     FSSpec spec;
  27.     
  28. #ifdef DEBUG_ICRAPI
  29.     // set up the syslog file...
  30.     err=(ICError)FindFolder(kOnSystemDisk,kDesktopFolderType,kCreateFolder,&vref,&dirid);
  31.     FSMakeFSSpec(vref,dirid,"\pIC Link In Log",&spec);
  32.     setsyslogfile(&spec);
  33. #endif
  34.     
  35.     printf("\nIC Link In Code Test\n\n");
  36. #ifdef DEBUG_ICRAPI
  37.     syslog(LOG_DEBUG,"IC Link In Code Test Begin");
  38. #endif
  39.     
  40.     err=ICRStart(&gRec,'PPCt');
  41.     printf("ICRStart: %ld\n",err);
  42. #ifdef DEBUG_ICRAPI
  43.     syslog(LOG_DEBUG,"ICRStart: %ld",err);
  44. #endif
  45.     
  46.     err=(ICError)FindFolder(kOnSystemDisk,kPreferencesFolderType,kCreateFolder,&vref,&dirid);
  47.     printf("FindFolder: %ld\n",err);
  48. #ifdef DEBUG_ICRAPI
  49.     syslog(LOG_DEBUG,"FindFolder: %ld",err);
  50. #endif
  51.     
  52.     folder_spec[0].vRefNum=vref;
  53.     folder_spec[0].dirID=dirid;
  54.     
  55.     err=ICRFindConfigFile(&gRec,1,folder_spec);
  56.     printf("ICRFindConfigFile: %ld\n",err);
  57. #ifdef DEBUG_ICRAPI
  58.     syslog(LOG_DEBUG,"ICRFindConfigFile: %ld",err);
  59. #endif
  60.     
  61.     err = ICRBegin(&gRec, icReadWritePerm);
  62.     printf("ICRBegin: %ld\n", err);
  63. #ifdef DEBUG_ICRAPI
  64.     syslog(LOG_DEBUG,"ICRBegin: %ld",err);
  65. #endif
  66.     
  67.     size = sizeof(Str255);
  68.     err = ICRGetPref(&gRec, "\pEmail", &attr, (Ptr) email, &size);
  69.     printf("ICRGetPref: %ld\n", err);
  70. #ifdef DEBUG_ICRAPI
  71.     syslog(LOG_DEBUG,"ICRGetPref: %ld",err);
  72. #endif
  73.     
  74.     p2cstr(email);
  75.     printf("Your Email address is [%s]\n", email);
  76. #ifdef DEBUG_ICRAPI
  77.     syslog(LOG_INFO,"Your Email address is [%s]",email);
  78. #endif
  79.     
  80. #ifdef DEBUG_ICRAPI
  81.     syslog(LOG_DEBUG,"Dumping Prefs");
  82. #endif
  83.     DumpPrefs();
  84. #ifdef DEBUG_ICRAPI
  85.     syslog(LOG_DEBUG,"Prefs Dumped");
  86. #endif
  87.     
  88.     err = ICREnd(&gRec);
  89.     printf("ICREnd: %ld\n", err);
  90. #ifdef DEBUG_ICRAPI
  91.     syslog(LOG_DEBUG,"ICREnd: %ld",err);
  92. #endif
  93.     
  94.     err = ICRGetSeed(&gRec, &seed);
  95.     printf("ICRGetSeed: %ld, seed= %ld\n", err, seed);
  96. #ifdef DEBUG_ICRAPI
  97.     syslog(LOG_DEBUG,"ICRGetSeed: %ld, seed=%ld",err,seed);
  98. #endif
  99.     
  100.     /* now monitor this seed to see if any preferences have changed */
  101.     
  102.     err=ICRStop(&gRec);
  103.     printf("ICRStop: %ld\n",err);
  104. #ifdef DEBUG_ICRAPI
  105.     syslog(LOG_DEBUG,"ICRStop: %ld",err);
  106. #endif
  107.     
  108.     return 0;
  109. }
  110.  
  111. void DumpPrefs(void){
  112.     ICError err;
  113.     long count;
  114.     long i;
  115.     Str255 key;
  116.     
  117.     err = ICRCountPref(&gRec, &count);
  118.     printf("ICRCountPref: %ld\n", err);
  119. #ifdef DEBUG_ICRAPI
  120.     syslog(LOG_DEBUG,"ICRCountPref: %ld, count=%ld",err,count);
  121. #endif
  122.     
  123.     for (i = 1; i <= count; i++) {
  124.         err = ICRGetIndPref(&gRec, i, key);
  125.         p2cstr(key);
  126.         printf("  ICRGetIndPref: %ld - %s\n", err, &key);
  127. #ifdef DEBUG_ICRAPI
  128.         syslog(LOG_DEBUG,"ICRGetIndPref: %ld, key=[%s]",err,key);
  129. #endif
  130.     };
  131. }
  132.  
  133.  
  134.